perm filename DOCTOR.INI[MAC,LSP] blob sn#454446 filedate 1979-06-28 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	(comment bps 20000.)
C00003 ENDMK
CāŠ—;
(comment bps 20000.)

(fasload demon fas dsk (aid rpg))
(fasload doctor fas dsk (mac lsp))
(fasload defmacro fas dsk (mac lsp))
(progn 

(COND ((STATUS FEATURES NEWIO)
       (CLOSE INFILE)
       (INPUSH -1))
      (T (UCLOSE)))

(gc)
(sstatus gctime 0)
(SUSPEND (quote |Save sys Doctor|))
(worker))